/*
* @Copyright (c) 2011 Aurélio Saraiva, Diego Plentz
* @Page http://github.com/plentz/jquery-maskmoney
* try at http://plentz.org/maskmoney

* Permission is hereby granted, free of charge, to any person
* obtaining a copy of this software and associated documentation
* files (the "Software"), to deal in the Software without
* restriction, including without limitation the rights to use,
* copy, modify, merge, publish, distribute, sublicense, and/or sell
* copies of the Software, and to permit persons to whom the
* Software is furnished to do so, subject to the following
* conditions:
* The above copyright notice and this permission notice shall be
* included in all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
* OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
* NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
* HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
* WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
* OTHER DEALINGS IN THE SOFTWARE.
*/

/*
* @Version: 1.3
* @Release: 2011-04-20
*/
(function($) {
   $.fn.maskMoney = function(settings) {
      settings = $.extend({
         symbol: 'US$',
         showSymbol: false,
         symbolStay: false,
         thousands: ',',
         decimal: '.',
         precision: 2,
         defaultZero: true,
         allowZero: false,
         allowNegative: false,
         alignRight: true
      }, settings);

      return this.each(function() {
         var input = $(this);

         function keypressEvent(e) {
            e = e||window.event;
            var k = e.charCode||e.keyCode||e.which;
            if (k == undefined) return false; //needed to handle an IE "special" event
            if (input.attr('readonly') && (k!=13&&k!=9)) return false; // don't allow editing of readonly fields but allow tab/enter

            if (k<48||k>57) { // any key except the numbers 0-9
               if (k==45) { // -(minus) key
                  input.val(changeSign(input));
                  return false;
               }
               if (k==43) { // +(plus) key
                  input.val(input.val().replace('-',''));
                  return false;
               } else if (k==13||k==9) { // enter key or tab key
                  return true;
               } else if (k==37||k==39) { // left arrow key or right arrow key
                  return true;
               } else { // any other key with keycode less than 48 and greater than 57
                  preventDefault(e);
                  return true;
               }
            } else if (input.val().length==input.attr('maxlength')) {
               return false;
            } else {
               preventDefault(e);

               var key = String.fromCharCode(k);
               var x = input.get(0);
               var selection = input.getInputSelection(x);
               var startPos = selection.start;
               var endPos = selection.end;
               x.value = x.value.substring(0, startPos) + key + x.value.substring(endPos, x.value.length);
               maskAndPosition(x, startPos + 1);
               return false;
            }
         }

         function keydownEvent(e) {
            e = e||window.event;
            var k = e.charCode||e.keyCode||e.which;
            if (k == undefined) return false; //needed to handle an IE "special" event
            if (input.attr('readonly') && (k!=13&&k!=9)) return false; // don't allow editing of readonly fields but allow tab/enter

            var x = input.get(0);
            var selection = input.getInputSelection(x);
            var startPos = selection.start;
            var endPos = selection.end;

            if (k==8) { // backspace key
               preventDefault(e);

               if(startPos == endPos){
                  // Remove single character
                  x.value = x.value.substring(0, startPos - 1) + x.value.substring(endPos, x.value.length);
                  startPos = startPos - 1;
               } else {
                  // Remove multiple characters
                  x.value = x.value.substring(0, startPos) + x.value.substring(endPos, x.value.length);
               }
               maskAndPosition(x, startPos);
               return false;
            } else if (k==9) { // tab key
               return true;
            } else if (k==46||k==63272) { // delete key (with special case for safari)
               preventDefault(e);
               if(x.selectionStart == x.selectionEnd){
                  // Remove single character
                  x.value = x.value.substring(0, startPos) + x.value.substring(endPos + 1, x.value.length);
               } else {
                  //Remove multiple characters
                  x.value = x.value.substring(0, startPos) + x.value.substring(endPos, x.value.length);
               }
               maskAndPosition(x, startPos);
               return false;
            } else { // any other key
               return true;
            }
         }

         function focusEvent(e) {
            stop(e);
            var mask = getDefaultMask();
            if (input.val()==mask&&!settings.allowZero) {
               input.val('');
            } else if (input.val()==''&&settings.defaultZero) {
               input.val(setSymbol(mask));
            } else {
               input.val(setSymbol(input.val()));
            }
            putCursorAtEnd(this);
         }

         function blurEvent(e) {
            if ($.browser.msie) {
               keypressEvent(e);
            }

            stop(e);
            if (input.val()==''||input.val()==setSymbol(getDefaultMask())||input.val()==settings.symbol) {
               if(!settings.allowZero)
                  input.val('');
               else if (!settings.symbolStay)
                  input.val(getDefaultMask());
               else
                  input.val(setSymbol(getDefaultMask()));
            } else {
               if (!settings.symbolStay)
                  input.val(input.val().replace(settings.symbol,''));
               else if (settings.symbolStay&&input.val()==settings.symbol)
                  input.val(setSymbol(getDefaultMask()));
            }
         }

         function mousedownEvent(e) {
            stop(e);
            putCursorAtEnd(this);
         }

         function clickEvent(e) {
            stop(e);
            putCursorAtEnd(this);
         }

         function mouseupEvent(e) {
            stop(e);
            putCursorAtEnd(this);
         }

         function stop(e) {
            stopPropagation(e);
            preventDefault(e);
         }

         function stopPropagation(e) {
            if (e.stopPropagation)
               e.stopPropagation();
            else
               e.cancelBubble = true;
         }

         function preventDefault(e) {
            if (e.preventDefault)
               e.preventDefault();
            else
               e.returnValue = false;
         }

         function preventDefault(e) {
            if (e.preventDefault) { //standard browsers
               e.preventDefault();
            } else { // internet explorer
               e.returnValue = false
            }
         }

         function putCursorAtEnd(obj) {
            var len = input.val().length;
            if(obj.setSelectionRange) { // standard browsers
               obj.focus();
               obj.setSelectionRange(len, len);
            } else if(obj.createTextRange) { // internet explorer
               var r = obj.createTextRange();
               r.collapse(false); // set the cursor at the end of the input;
               r.moveStart("character", len);
               r.moveEnd("character", (len - len));
               r.select();
            }
         }

         function maskAndPosition(x, startPos) {
            var originalLen = input.val().length;
            input.val(maskValue(x.value));
            var newLen = input.val().length;
            startPos = startPos - (originalLen - newLen);
            input.setCursorPosition(startPos);
         }

         function maskValue(v) {
            v = v.replace(settings.symbol,'');

            var strCheck = '0123456789';
            var len = v.length;
            var a = '', t = '', neg='';

            if(len!=0 && v.charAt(0)=='-'){
               v = v.replace('-','');
               if(settings.allowNegative){
                  neg = '-';
               }
            }

            if (len==0) {
               if (!settings.defaultZero) return t;
               t = '0.00';
            }

            for (var i = 0; i<len; i++) {
               if ((v.charAt(i)!='0') && (v.charAt(i)!=settings.decimal)) break;
            }

            for (; i<len; i++) {
               if (strCheck.indexOf(v.charAt(i))!=-1) a+= v.charAt(i);
            }

            var n = parseFloat(a);
            n = isNaN(n) ? 0 : n/Math.pow(10,settings.precision);
            t = n.toFixed(settings.precision);

            i = settings.precision == 0 ? 0 : 1;
            var p, d = (t=t.split('.'))[i].substr(0,settings.precision);
            for (p = (t=t[0]).length; (p-=3)>=1;) {
               t = t.substr(0,p)+settings.thousands+t.substr(p);
            }

            return (settings.precision>0)
               ? setSymbol(neg+t+settings.decimal+d+Array((settings.precision+1)-d.length).join(0))
               : setSymbol(neg+t);
         }

         function mask() {
            var value = input.val();
            input.val(maskValue(value));
         }

         function getDefaultMask() {
            var n = parseFloat('0')/Math.pow(10,settings.precision);
            return (n.toFixed(settings.precision)).replace(new RegExp('\\.','g'),settings.decimal);
         }

         function setSymbol(v) {
            if (settings.showSymbol) {
               if (v.substr(0, settings.symbol.length) != settings.symbol) return settings.symbol+v;
            }
            return v;
         }

         function changeSign(i){
            if (settings.allowNegative) {
               var vic = i.val();
               var symbol = '';

               if (settings.showSymbol && i.val()!='')
                  var symbol = vic.substr(0, settings.symbol.length);

               if (i.val()!='' && vic.indexOf('-') >= 0){
                  return symbol+i.val().replace('-','').replace(symbol,'');
               } else{
                  return symbol+'-'+i.val().replace(symbol,'');
               }
            } else {
               return i.val();
            }
         }

         input.bind('keypress.maskMoney',keypressEvent);
         input.bind('keydown.maskMoney',keydownEvent);
         input.bind('blur.maskMoney',blurEvent);
         input.bind('focus.maskMoney',focusEvent);
         input.bind('mask', mask);

         input.bind('mouseup.maskMoney',mouseupEvent);
         input.bind('mousedown.maskMoney',mousedownEvent);
         input.bind('click.maskMoney',clickEvent);
         input.css("text-align", settings.alignRight ? 'right' : 'left');

         input.one('unmaskMoney',function() {
            input.unbind('.maskMoney');

            if ($.browser.msie) {
               this.onpaste= null;
            } else if ($.browser.mozilla) {
               this.removeEventListener('input',blurEvent,false);
            }
         });
      });
   }

   $.fn.unmaskMoney=function() {
      return this.trigger('unmaskMoney');
   };

   $.fn.mask=function() {
      return this.trigger('mask');
   };

   $.fn.setCursorPosition = function(pos) {
      this.each(function(index, elem) {
         if (elem.setSelectionRange) {
            elem.focus();
            elem.setSelectionRange(pos, pos);
         } else if (elem.createTextRange) {
            var range = elem.createTextRange();
            range.collapse(true);
            range.moveEnd('character', pos);
            range.moveStart('character', pos);
            range.select();
         }
      });
      return this;
   };

   $.fn.getInputSelection = function(el) {
      var start = 0, end = 0, normalizedValue, range, textInputRange, len, endRange;

      if (typeof el.selectionStart == "number" && typeof el.selectionEnd == "number") {
         start = el.selectionStart;
         end = el.selectionEnd;
      } else {
         range = document.selection.createRange();

         if (range && range.parentElement() == el) {
            len = el.value.length;
            normalizedValue = el.value.replace(/\r\n/g, "\n");

            // Create a working TextRange that lives only in the input
            textInputRange = el.createTextRange();
            textInputRange.moveToBookmark(range.getBookmark());

            // Check if the start and end of the selection are at the very end
            // of the input, since moveStart/moveEnd doesn't return what we want
            // in those cases
            endRange = el.createTextRange();
            endRange.collapse(false);

            if (textInputRange.compareEndPoints("StartToEnd", endRange) > -1) {
               start = end = len;
            } else {
               start = -textInputRange.moveStart("character", -len);
               start += normalizedValue.slice(0, start).split("\n").length - 1;

               if (textInputRange.compareEndPoints("EndToEnd", endRange) > -1) {
                  end = len;
               } else {
                  end = -textInputRange.moveEnd("character", -len);
                  end += normalizedValue.slice(0, end).split("\n").length - 1;
               }
            }
         }
      }

      return {
         start: start,
         end: end
      };
   }
})(jQuery);